home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / TIG4.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  147 lines
  1. name Sharnoa Tiger 4
  2.  
  3. % 00
  4. O >4
  5. N >4
  6. G >2
  7. X ->3.>4
  8. Y ->3.>4
  9. Z ->3.>4
  10. A ->3.>4
  11. I ->3.>4
  12. J ->3.>4
  13. K ->3.>4
  14. Q ->3.>4
  15. R ->3.>4
  16. C ->3.>4
  17. P >40
  18. F >3.1
  19. H >2
  20. D >2
  21. T >2
  22. M >2
  23. S >4
  24.  
  25.  
  26. ModalLetters X Y Z F                  # List of letters that are modal    
  27.  
  28. ModalGs 0 1 2 3 73 74 75 76 80 81 82 83 84 85  # List of g codes that are modal    
  29.  
  30. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  31. First#? N                             # Y or N  'Output 1st sequence no.  
  32. Last#? N                              # Y or N  'Output last sequence no. 
  33.  
  34. HCode X                               # X or X U  'Horizontal char.       
  35. VCode Y                               # Y or Y V  'Vertical char.         
  36. Dcode Z                               # Depth char.                       
  37. FeedCode F                            # Feed rate char.                   
  38.  
  39. Comment ( )                           # Begin End comment char.           
  40.  
  41. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  42. Coolant 8 9 7                         # On, Off & Mist m codes            
  43. DComp 41 42 40                        # Left, Right & Cancel m codes      
  44. LComp 43 49                           # On & Off codes                    
  45.  
  46. Feed G1                             # Linear move                       
  47. Rapid G0                            # Rapid positioning word            
  48.  
  49. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  50.  
  51. Work G                                # Work offset register              
  52.  
  53. CtrCode R                             # I J or R or I J K L               
  54. Helical? N
  55.  
  56. Spaces? Y                             # Y or N  'Spaces between words     
  57.  
  58. Incremental? N                        # Y or N  'Inc or abs output        
  59. CtrIncremental? N                     # Y or N  'Inc or abs I & J         
  60. ByQuadrants? Y                        # Y or N  'Break arcs at quadrants  
  61.  
  62. Inch/MM 70 71                         # Inch & Metric g codes             
  63.  
  64. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  65.  
  66. Drill                                 # Drilling canned/manual cycle      
  67. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  68. end cancel
  69.  
  70. Peck                                  # Pecking canned/manual cycle       
  71. G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
  72. end cancel
  73.  
  74. Tap                                   # Tapping canned/manual cycle       
  75. G84 X[H] Y[V] Z[D] R[Vclear] F[Frate] Q[VBite]
  76. end cancel
  77.  
  78. LTap                                  # Left handed tapping cycle         
  79. G74 X[H] Y[V] Z[D] R[Vclear] F[Frate] Q[VBite]
  80. end cancel
  81.  
  82. Ream                                  # Reaming canned/manual cycle       
  83. G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  84. end cancel
  85.  
  86. Bore                                  # Boring canned/manual cycle        
  87. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  88. end cancel
  89.  
  90. Back                                  # Back boring canned/manual cycle   
  91. G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  92. end cancel
  93.  
  94. Cancel                                # Cancel a canned/manual cycle      
  95. G80
  96. end
  97.  
  98. StartCode                             # Start of the program              
  99. %0
  100. G0 G17 G[Unitmode] G90
  101. End
  102.  
  103. 1stToolChange                         # First tool change                 
  104. S[Speed] T[Tool] M6
  105. G75 M[Direct]
  106. G0 X[H] Y[V] M[Cool]
  107. Z[RPlane]
  108. End
  109.  
  110. Infeed                                # Enable cutter comp                
  111. G[Side] X[H] Y[V] H[DComp] F[FRate]
  112. end
  113.  
  114. Outfeed                               # Disable cutter comp               
  115. G1 G40 X[H] Y[V]
  116. end
  117.  
  118. ToolChange                            # Secondary tool changes            
  119. G0 Z[RPlane]
  120. M25
  121. G90 X[ToolH] Y[ToolV] M5
  122. S[Speed] M[Tool] M6
  123. G75 M[Direct]
  124. G0 X[H] Y[V] M[Cool]
  125. G0 Z[RPlane]
  126. End
  127.  
  128. EndCode                               # End of the program                
  129. G0 Z[RPlane]
  130. M25
  131. G90 X[ToolH] Y[ToolV] M5
  132. M2
  133. %0
  134. End
  135.  
  136. CwCode                                # CW circular move                  
  137. G11 I[Ival] J[Jval] R[ArcRad] C[StartAng]
  138. G12 C[EndAng]
  139. end
  140.  
  141. CcwCode                               # CCW circular move                 
  142. G11 I[Ival] J[Jval] R[ArcRad] C[StartAng]
  143. G13 C[EndAng]
  144. end
  145.  
  146.  
  147.